(gamegrid-setup-default-font): Use face-spec-set.

diff --git a/lisp/play/gamegrid.el b/lisp/play/gamegrid.el
index 54e766a5878379ff3239fdb596e17aa394c31c7b..813c75d173120bf0292343df1d07bb1681e9d45d 100644 (file)
--- a/lisp/play/gamegrid.el
+++ b/lisp/play/gamegrid.el
@@ -320,7 +320,7 @@ static unsigned char gamegrid_bits[] = {
                          (< max-height height))
                      (setq max-height height))))))
       (when (and max-height (< max-height 1))
-       (set-face-attribute gamegrid-face nil :height max-height)))))
+       (face-spec-set gamegrid-face `((t :height ,max-height)))))))
 
 (defun gamegrid-initialize-display ()
   (setq gamegrid-display-mode (gamegrid-display-type))